package ar.edu.caece.compiler.grammar.factories;

import ar.edu.caece.compiler.grammar.AbstractTokenVisitorFactory;
import ar.edu.caece.compiler.grammar.Recognizer;
import ar.edu.caece.compiler.grammar.TokenRecognizer;
import ar.edu.caece.compiler.grammar.TokenVisitor;
import ar.edu.caece.compiler.grammar.attributes.Attribute;
import ar.edu.caece.compiler.grammar.attributes.AttributeUtils;
import ar.edu.caece.compiler.grammar.attributes.StringAttribute;
import ar.edu.caece.compiler.grammar.nonterminals.EXPR2;
import ar.edu.caece.compiler.grammar.nonterminals.EXPR2A;
import ar.edu.caece.compiler.grammar.nonterminals.EXPR3;

public class EXPR2Factory extends AbstractTokenVisitorFactory {

	private static EXPR2Factory INSTANCE;
	
	public static EXPR2Factory getInstance() throws Exception {
		if(INSTANCE==null) INSTANCE = new EXPR2Factory();
		return INSTANCE;
	}
	
	private EXPR3Factory expr3Factory;
	private EXPR2AFactory expr2aFactory;
	private TokenVisitor parseEXPR3;
	private TokenVisitor parseEXPR2A;
	
	private Initializer initializer = new Initializer() {
		
		@Override
		public void init() throws Exception {
			initializer = NoOperationInitializer.getInstance();
			expr3Factory = EXPR3Factory.getInstance();
			expr2aFactory = EXPR2AFactory.getInstance();
			parseEXPR2A = expr2aFactory.makeVisitor();
			parseEXPR3 = expr3Factory.makeVisitor();
		}
	};
	
	private EXPR2Factory() throws Exception {

	}
	
	@Override
	public TokenVisitor makeChainedVisitor(
			final TokenVisitor siguiente) throws Exception {
		initializer.init();

		return new TokenVisitor() {

			@Override
			public Recognizer defaultCase(TokenRecognizer llamador)
					throws Exception {				
				TokenVisitor parseEXPR3Chained = expr3Factory.makeChainedVisitor(siguiente);
				parseEXPR3Chained.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));
				
				Recognizer result = llamador.execute(parseEXPR3Chained);
				if(result instanceof EXPR3) {
					parseEXPR3.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));
					parseEXPR2A.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));

					String tipo = "";
					
					EXPR3 expr3 = (EXPR3) result;
					parseEXPR2A.addInheritedAttribute(Attribute.ARBOL_HEREDADO, expr3.getAttribute(Attribute.ARBOL_SINTETIZADO));
					EXPR2A expr2a = (EXPR2A) nextToken().execute(parseEXPR2A);
					
					if( "NINGUNO".contentEquals(((StringAttribute) expr2a.getAttribute("tipo")).getValue())) {
						tipo = expr3.getAttribute("tipo").toString();
					} else {
						if(expr2a.getAttribute("tipo").equals(expr3.getAttribute("tipo"))) {
							tipo = expr3.getAttribute("tipo").toString();
						} else {
							//TODO ERROR
							AttributeUtils.error("Error. Tipos de expresiones no coinciden",llamador);
						}
					}
					
					
					EXPR2 expr2 = new EXPR2 (expr3, expr2a);
					expr2.addAttribute("tipo", new StringAttribute(tipo));
					expr2.addAttribute(Attribute.ARBOL_SINTETIZADO,expr2a.getAttribute(Attribute.ARBOL_SINTETIZADO));
					return expr2;
				} 
				else {
					return result;
				}
			}
			
		};
	
	}
	@Override
	public TokenVisitor makeVisitor() throws Exception {
		initializer.init();

		return new TokenVisitor() {

			@Override
			public Recognizer defaultCase(TokenRecognizer llamador) throws Exception {
				
				parseEXPR3.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));
				parseEXPR2A.addInheritedAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA, getAttribute(Attribute.TABLA_SIMBOLOS_HEREDADA));

				String tipo = "";
				
				EXPR3 expr3 = (EXPR3) llamador.execute(parseEXPR3);
				parseEXPR2A.addInheritedAttribute(Attribute.ARBOL_HEREDADO, expr3.getAttribute(Attribute.ARBOL_SINTETIZADO));
				EXPR2A expr2a = (EXPR2A) nextToken().execute(parseEXPR2A);
				
				if( "NINGUNO".contentEquals(((StringAttribute) expr2a.getAttribute("tipo")).getValue())) {
					tipo = expr3.getAttribute("tipo").toString();
				} else {
					if(expr2a.getAttribute("tipo").equals(expr3.getAttribute("tipo"))) {
						tipo = expr3.getAttribute("tipo").toString();
					} else {
						//TODO ERROR
						AttributeUtils.error("Error. Tipos de expresiones no coinciden",llamador);
					}
				}
				
				
				EXPR2 expr2 = new EXPR2 (expr3, expr2a);
				expr2.addAttribute("tipo", new StringAttribute(tipo));
				expr2.addAttribute(Attribute.ARBOL_SINTETIZADO,expr2a.getAttribute(Attribute.ARBOL_SINTETIZADO));
				return expr2;
				
				
			}
		};
	}
	
	
}
